home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Dr. Windows 3
/
dr win3.zip
/
dr win3
/
PROGRAMR
/
CATCH.ZIP
/
RUN.WBF
< prev
Wrap
Text File
|
1993-03-03
|
451b
|
24 lines
;Example Catch file
;Copyright Sean Batten
let dir=GetWindir()
let dir=join(dir,"\*.exe")
Let program=fileselect(dir)
Let params=""
;Make sure something was selected
if program=="" goto abort
;Now find out if they want to specify parameters
ask ("Parameters", "Do you wish to specify parameters???")
if @YES let params=input ("","Enter parameters")
run (program,params)
goto end
:abort
ok ("","No program selected")
:end